﻿Imports Sureflix.FogBugz

Module Module1

	Sub Main(ByVal ParamArray Args() As String)

        'Dim fogbugz = New Metrics()
        'Console.WriteLine("Connecting to FogBugz...")

        'Dim metrics As List(Of DevelopmentMetric) = New List(Of DevelopmentMetric)
        'Try
        '	metrics = fogbugz.GetDevelopmentMetrics(Args(0), Args(1))
        'Catch ex As Exception
        '	Console.WriteLine(ex.Message)
        '	Console.WriteLine(ex.GetType().Name)
        '	Console.WriteLine()
        '	Console.WriteLine(ex.Source)
        'End Try

        'For Each metric In metrics
        '	Console.WriteLine("Metric: {0} -Qty: {1} -Value: {2}", metric.Name, metric.Qty, metric.Value)
        'Next

        'Console.ReadLine()

	End Sub

End Module
